package com.settlement.system.common.util.common;

import com.settlement.system.context.SpringContextHolder;
import lombok.extern.slf4j.Slf4j;
import org.springframework.data.redis.core.RedisTemplate;
import org.springframework.util.CollectionUtils;

import java.net.InetAddress;
import java.net.UnknownHostException;
import java.util.Calendar;
import java.util.List;
import java.util.Map;
import java.util.Set;
import java.util.concurrent.TimeUnit;

/**
 * @author author
 */
@Slf4j
public class RedisUtil {

    private static RedisTemplate redisTemplate = null;

    static {
        redisTemplate = SpringContextHolder.getBean("redisTemplate", RedisTemplate.class);
    }

    private static String preKey="acs:web:";

    public void save(final String key, Object value, Long expireTime) {
        redisTemplate.opsForValue().set(key,value,expireTime, TimeUnit.MINUTES);
    }

    public Object getValue(String key){
        return redisTemplate.opsForValue().get(key);
    }

    public void delete(final String key){
        redisTemplate.delete(key);
    }

    /**
     * 指定缓存失效时间
     * @param key 键
     * @param time 时间(秒)
     * @return
     */
    public static  boolean expire(String key, long time) {
        try {
            if (time > 0) {
                redisTemplate.expire(key, time, TimeUnit.SECONDS);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 根据key 获取过期时间
     *
     * @param key
     *            键 不能为null
     * @return 时间(秒) 返回0代表为永久有效
     */
    public static  long getExpire(String key) {
        return redisTemplate.getExpire(key, TimeUnit.SECONDS);
    }

    /**
     * 判断key是否存在
     *
     * @param key
     *            键
     * @return true 存在 false不存在
     */
    public static  boolean hasKey(String key) {
        try {
            return redisTemplate.hasKey(key);
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 删除缓存
     * @param key 可以传一个值 或多个
     */
    @SuppressWarnings("unchecked")
    public static  void del(String... key) {
        if (key != null && key.length > 0) {
            if (key.length == 1) {
                redisTemplate.delete(key[0]);
            } else {
                redisTemplate.delete(CollectionUtils.arrayToList(key));
            }
        }
    }

    // ============================String=============================
    /**
     * 普通缓存获取
     *
     * @param key 键
     * @return 值
     */
    public static  Object get(String key) {
        return key == null ? null : redisTemplate.opsForValue().get(key);
    }

    /**
     * 获取缓存<br>
     * 注：该方法暂不支持Character数据类型
     * @param key	key
     * @param clazz	类型
     * @return
     */
    @SuppressWarnings("unchecked")
    public static <T> T get(String key, Class<T> clazz) {
        return (T)redisTemplate.boundValueOps(key).get();
    }

    /**
     * 普通缓存放入
     *
     * @param key
     *            键
     * @param value
     *            值
     * @return true成功 false失败
     */
    public static  boolean set(String key, Object value) {
        try {
            redisTemplate.opsForValue().set(key, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }

    }

    /**
     * 普通缓存放入并设置时间
     * @param key 键
     * @param value 值
     * @param time 时间(秒) time要大于0 如果time小于等于0 将设置无限期
     * @return true成功 false 失败
     */
    public static  boolean set(String key, Object value, long time) {
        try {
            if (time > 0) {
                redisTemplate.opsForValue().set(key, value, time, TimeUnit.SECONDS);
            } else {
                set(key, value);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 递增
     * @param key 键
     * @param delta 要增加几(大于0)
     * @return
     */
    public static  long incr(String key, long delta) {
        if (delta < 0) {
            throw new RuntimeException("递增因子必须大于0");
        }
        return redisTemplate.opsForValue().increment(key, delta);
    }

    /**
     * 递减
     * @param key 键
     * @param delta 要减少几(小于0)
     * @return
     */
    public static  long decr(String key, long delta) {
        if (delta < 0) {
            throw new RuntimeException("递减因子必须大于0");
        }
        return redisTemplate.opsForValue().increment(key, -delta);
    }

    // ================================Map=================================
    /**
     * HashGet
     *
     * @param key
     *            键 不能为null
     * @param item
     *            项 不能为null
     * @return 值
     */
    public static  Object hget(String key, String item) {
        return redisTemplate.opsForHash().get(key, item);
    }

    /**
     * 获取hashKey对应的所有键值
     *
     * @param key
     *            键
     * @return 对应的多个键值
     */
    public static Map<Object, Object> hmget(String key) {
        return redisTemplate.opsForHash().entries(key);
    }

    /**
     * HashSet
     * @param key 键
     * @param map 对应多个键值
     * @return true 成功 false 失败
     */
    public static  boolean hmset(String key, Map<String, Object> map) {
        try {
            redisTemplate.opsForHash().putAll(key, map);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * HashSet 并设置时间
     * @param key 键
     * @param map 对应多个键值
     * @param time 时间(秒)
     * @return true成功 false失败
     */
    public static  boolean hmset(String key, Map<String, Object> map, long time) {
        try {
            redisTemplate.opsForHash().putAll(key, map);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 向一张hash表中放入数据,如果不存在将创建
     *
     * @param key
     *            键
     * @param item
     *            项
     * @param value
     *            值
     * @return true 成功 false失败
     */
    public static  boolean hset(String key, String item, Object value) {
        try {
            redisTemplate.opsForHash().put(key, item, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 向一张hash表中放入数据,如果不存在将创建
     * @param key 键
     * @param item 项
     * @param value 值
     * @param time 时间(秒) 注意:如果已存在的hash表有时间,这里将会替换原有的时间
     * @return true 成功 false失败
     */
    public static  boolean hset(String key, String item, Object value, long time) {
        try {
            redisTemplate.opsForHash().put(key, item, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 删除hash表中的值
     *
     * @param key
     *            键 不能为null
     * @param item
     *            项 可以使多个 不能为null
     */
    public static  void hdel(String key, Object... item) {
        redisTemplate.opsForHash().delete(key, item);
    }

    /**
     * 判断hash表中是否有该项的值
     *
     * @param key
     *            键 不能为null
     * @param item
     *            项 不能为null
     * @return true 存在 false不存在
     */
    public static  boolean hHasKey(String key, String item) {
        return redisTemplate.opsForHash().hasKey(key, item);
    }

    /**
     * hash递增 如果不存在,就会创建一个 并把新增后的值返回
     *
     * @param key
     *            键
     * @param item
     *            项
     * @param by
     *            要增加几(大于0)
     * @return
     */
    public static  double hincr(String key, String item, double by) {
        return redisTemplate.opsForHash().increment(key, item, by);
    }

    /**
     * hash递减
     *
     * @param key
     *            键
     * @param item
     *            项
     * @param by
     *            要减少记(小于0)
     * @return
     */
    public static  double hdecr(String key, String item, double by) {
        return redisTemplate.opsForHash().increment(key, item, -by);
    }

    // ============================set=============================
    /**
     * 根据key获取Set中的所有值
     *
     * @param key
     *            键
     * @return
     */
    public static Set<Object> sGet(String key) {
        try {
            return redisTemplate.opsForSet().members(key);
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }

    /**
     * 根据value从一个set中查询,是否存在
     *
     * @param key
     *            键
     * @param value
     *            值
     * @return true 存在 false不存在
     */
    public static  boolean sHasKey(String key, Object value) {
        try {
            return redisTemplate.opsForSet().isMember(key, value);
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 将数据放入set缓存
     *
     * @param key
     *            键
     * @param values
     *            值 可以是多个
     * @return 成功个数
     */
    public static  long sSet(String key, Object... values) {
        try {
            return redisTemplate.opsForSet().add(key, values);
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 将set数据放入缓存
     * @param key 键
     * @param time 时间(秒)
     * @param values 值 可以是多个
     * @return 成功个数
     */
    public static  long sSetAndTime(String key, long time, Object... values) {
        try {
            Long count = redisTemplate.opsForSet().add(key, values);
            if (time > 0) {
                expire(key, time);
            }
            return count;
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 获取set缓存的长度
     *
     * @param key
     *            键
     * @return
     */
    public static  long sGetSetSize(String key) {
        try {
            return redisTemplate.opsForSet().size(key);
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 移除值为value的
     *
     * @param key
     *            键
     * @param values
     *            值 可以是多个
     * @return 移除的个数
     */
    public static  long setRemove(String key, Object... values) {
        try {
            Long count = redisTemplate.opsForSet().remove(key, values);
            return count;
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 获取list缓存的内容
     *
     * @param key
     *            键
     * @param start
     *            开始
     * @param end
     *            结束 0 到 -1代表所有值
     * @return
     */
    public static List<Object> lGet(String key, long start, long end) {
        try {
            return redisTemplate.opsForList().range(key, start, end);
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }

    /**
     * 获取list缓存的长度
     *
     * @param key
     *            键
     * @return
     */
    public static  long lGetListSize(String key) {
        try {
            return redisTemplate.opsForList().size(key);
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 通过索引 获取list中的值
     *
     * @param key
     *            键
     * @param index
     *            索引 index>=0时， 0 表头，1
     *            第二个元素，依次类推；index<0时，-1，表尾，-2倒数第二个元素，依次类推
     * @return
     */
    public static  Object lGetIndex(String key, long index) {
        try {
            return redisTemplate.opsForList().index(key, index);
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key
     *            键
     * @param value
     *            值
     * @return
     */
    public static  boolean lSet(String key, Object value) {
        try {
            redisTemplate.opsForList().rightPush(key, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 将list放入缓存
     * @param key 键
     * @param value 值
     * @param time 时间(秒)
     * @return
     */
    public static  boolean lSet(String key, Object value, long time) {
        try {
            redisTemplate.opsForList().rightPush(key, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 将list放入缓存
     * @param key 键
     * @param value 值
     * @return
     */
    public static  boolean lSet(String key, List<Object> value) {
        try {
            redisTemplate.opsForList().rightPushAll(key, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key 键
     * @param value 值
     * @param time 时间(秒)
     * @return
     */
    public static  boolean lSet(String key, List<Object> value, long time) {
        try {
            redisTemplate.opsForList().rightPushAll(key, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 根据索引修改list中的某条数据
     *
     * @param key
     *            键
     * @param index
     *            索引
     * @param value
     *            值
     * @return
     */
    public static  boolean lUpdateIndex(String key, long index, Object value) {
        try {
            redisTemplate.opsForList().set(key, index, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 移除N个值为value
     *
     * @param key
     *            键
     * @param count
     *            移除多少个
     * @param value
     *            值
     * @return 移除的个数
     */
    public static  long lRemove(String key, long count, Object value) {
        try {
            Long remove = redisTemplate.opsForList().remove(key, count, value);
            return remove;
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 获取key前缀
     * @return
     */
    public static String getPreKey(){
        return preKey;
    }

    public static  boolean setIfAbsent(String key, Object value) {
        try {
            return redisTemplate.opsForValue().setIfAbsent(key, value);
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    public static long getTtl(String key){
        return redisTemplate.getExpire(key,TimeUnit.SECONDS);
    }


    /**
     * 判断是否能运行
     * @param taskName
     * @return
     */
    public static boolean checkBeforeStart(String taskName) {
        try {
            log.info("checkBeforeStart");
            return !checkIfRunning(taskName) && ifGetTheLock(taskName);
        }catch (Exception ex){
            ex.printStackTrace();
            return false;
        }
    }

    public static boolean checkAndWait(String taskName) throws UnknownHostException, InterruptedException {
        boolean b = false;
        int count = 0;
        do{
            b = ifGetTheLock(taskName);
            Thread.sleep(1000L);
            count++;
        }while (!b && count <= 30);

        return b;
    }

    public static void releaseLock(String taskName){
        try {
            String redisKey = getPreKey() + taskName;
            boolean b = checkIfRunningOnThisServer(taskName);
            if(b){
                RedisUtil.del(redisKey);
            }
            long ttl = RedisUtil.getTtl(redisKey);
            log.info("ttl={}",ttl);
        } catch (UnknownHostException e) {
            log.error(e.getMessage(),e);
        }
    }

    public static void clearTaskIfPossible(String taskName) {
        String redisKey = getPreKey() + taskName;
        boolean ifRunningOnThisServer = false;
        try {
            ifRunningOnThisServer = RedisUtil.checkIfRunningOnThisServer(taskName);
            if(ifRunningOnThisServer){
                RedisUtil.del(redisKey);
            }
        } catch (UnknownHostException e) {
            log.error("",e);
        }
    }

    /**
     * 判断任务是否正在运行，在任务开始前判断一下
     * @param taskName
     * @return
     * @throws UnknownHostException
     */
    public static boolean checkIfRunning(String taskName) {
        String redisKey = getPreKey() + taskName;
        long ttl = RedisUtil.getTtl(redisKey);
        boolean ifRunning = ttl > 0 || ttl == -1;
        log.info("checkIfRunning,{}",ifRunning);
        log.info("ttl={}",ttl);
        return ifRunning;
    }

    /**
     * 尝试获取锁
     * @param taskName
     * @return
     * @throws UnknownHostException
     */
    public static boolean ifGetTheLock(String taskName) throws UnknownHostException {
        log.info("ifGetTheLock");
        String redisKey = getPreKey() + taskName;
        String thisServerId = InetAddress.getLocalHost().getHostName();
        boolean b = RedisUtil.setIfAbsent(redisKey, thisServerId);
        if(b){
            log.info("争取到锁，本线程继续，刷新ttl");
            RedisUtil.set(redisKey,thisServerId,getExpireTimeSecond());
            return true;
        }else{
            log.info("没争取到锁，其他线程继续，本线程退出");
            return false;
        }
    }



    /**
     * 是否已在其他服务器运行
     * @param taskName
     * @return
     * @throws UnknownHostException
     */
    public static boolean checkIfRunningOnAnotherServer(String taskName) throws UnknownHostException {
        String redisKey = getPreKey() + taskName;
        String thisServerId = InetAddress.getLocalHost().getHostName();
        long ttl = RedisUtil.getTtl(redisKey);
        log.info("ttl={}",ttl);
        if(ttl > 0 || ttl == -1){
            // 判断任务是否正在其他机器上运行，如果是返回false，否则true
            String s = RedisUtil.get(redisKey, String.class);
            if(!thisServerId.equals(s)){
                return true;
            }else{
                RedisUtil.set(redisKey,thisServerId,getExpireTimeSecond());
            }
        }
        return false;
    }

    public static boolean checkIfRunningOnThisServer(String taskName) throws UnknownHostException {
        return checkIfRunningOnThisServer(taskName,0);
    }

    /**
     * 是否已在本服务器运行
     * @param taskName
     * @return
     * @throws UnknownHostException
     */
    public static boolean checkIfRunningOnThisServer(String taskName,long expireTimeSecs) throws UnknownHostException {
        log.info("checkIfRunningOnThisServer,taskName={},expireTimeSecs={}",taskName,expireTimeSecs);
        String redisKey = getPreKey() + taskName;
        String thisServerId = InetAddress.getLocalHost().getHostName();
        long ttl = RedisUtil.getTtl(redisKey);
        log.info("ttl={}",ttl);
        if(ttl > 0 || ttl == -1){
            // 判断任务是否正在其他机器上运行，如果是返回false，否则true
            String s = RedisUtil.get(redisKey, String.class);
            if(thisServerId.equals(s)){
                RedisUtil.set(redisKey,thisServerId,getExpireTimeSecond(expireTimeSecs));
                return true;
            }
        }
        return false;
    }

    /**
     * 获取超时时间
     * @param expireTimeSeconds 小于等于0时，取默认时间
     */
    static long getExpireTimeSecond(long expireTimeSeconds){
        if(expireTimeSeconds > 0){
            return expireTimeSeconds;
        }
        //凌晨任务较多，超时时间设置长一点
        int hour = Calendar.getInstance().get(Calendar.HOUR_OF_DAY);
        if(hour < 6){
            return 20L;
        }
        return 10L;
    }

    static long getExpireTimeSecond(){
        return getExpireTimeSecond(0);
    }

    public static String getRedisKey(String key){
        if(!key.startsWith(preKey)){
            return preKey + key;
        }
        return key;
    }
}
